/ BBS in a Box 22 / AMUG_22-4.ISO / Files IV / Prog / T / TinyTools-2.sit / TinyTools / SEVEN.h

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 07 53 45 56 45 4e 2e | 68 00 00 00 00 00 00 00 |..SEVEN.|h.......|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4d 50 53 | 20 01 00 00 00 00 00 00 |.TEXTMPS| .......|
|00000050| 00 00 00 00 00 04 d3 00 | 00 01 ac b0 5f 8e 2d b0 |........|...._.-.|
|00000060| 5f 8e 2d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |_.-.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 91 d1 00 00 |........|........|
|00000080| 2f 2a 20 09 72 6f 75 74 | 69 6e 65 73 20 66 6f 72 |/* .rout|ines for|
|00000090| 20 63 6f 6e 76 65 72 74 | 69 6e 67 20 61 20 65 69 | convert|ing a ei|
|000000a0| 67 68 74 20 62 69 74 20 | 64 61 74 61 20 74 6f 20 |ght bit |data to |
|000000b0| 73 65 76 65 6e 20 62 69 | 74 20 64 61 74 61 20 61 |seven bi|t data a|
|000000c0| 6e 64 20 76 69 63 65 20 | 76 65 72 73 61 2e 0d 09 |nd vice |versa...|
|000000d0| 43 6f 70 79 72 69 67 68 | 74 20 28 63 29 20 31 39 |Copyrigh|t (c) 19|
|000000e0| 39 37 20 62 79 20 4a 6f | 68 6e 20 4d 6f 6e 74 62 |97 by Jo|hn Montb|
|000000f0| 72 69 61 6e 64 2e 20 20 | 41 6c 6c 20 52 69 67 68 |riand.  |All Righ|
|00000100| 74 73 20 52 65 73 65 72 | 76 65 64 2e 0d 09 50 65 |ts Reser|ved...Pe|
|00000110| 72 6d 69 73 73 69 6f 6e | 20 67 72 61 6e 74 65 64 |rmission| granted|
|00000120| 20 66 6f 72 20 70 75 62 | 6c 69 63 20 75 73 65 2e | for pub|lic use.|
|00000130| 0d 09 44 69 73 74 72 69 | 62 75 74 65 20 66 72 65 |..Distri|bute fre|
|00000140| 65 6c 79 20 69 6e 20 61 | 72 65 61 73 20 77 68 65 |ely in a|reas whe|
|00000150| 72 65 20 74 68 65 20 6c | 61 77 73 20 6f 66 20 63 |re the l|aws of c|
|00000160| 6f 70 79 72 69 67 68 74 | 20 61 70 70 6c 79 2e 0d |opyright| apply..|
|00000170| 09 55 53 45 20 41 54 20 | 59 4f 55 52 20 4f 57 4e |.USE AT |YOUR OWN|
|00000180| 20 52 49 53 4b 2e 0d 09 | 44 4f 20 4e 4f 54 20 44 | RISK...|DO NOT D|
|00000190| 49 53 54 52 49 42 55 54 | 45 20 4d 4f 44 49 46 49 |ISTRIBUT|E MODIFI|
|000001a0| 45 44 20 43 4f 50 49 45 | 53 2e 0d 09 43 6f 6d 6d |ED COPIE|S...Comm|
|000001b0| 65 6e 74 73 2f 71 75 65 | 73 74 69 6f 6e 73 2f 70 |ents/que|stions/p|
|000001c0| 6f 73 74 63 61 72 64 73 | 20 74 6f 20 74 68 65 20 |ostcards| to the |
|000001d0| 61 75 74 68 6f 72 20 61 | 74 20 74 68 65 20 61 64 |author a|t the ad|
|000001e0| 64 72 65 73 73 3a 0d 09 | 09 4a 6f 68 6e 20 4d 6f |dress:..|.John Mo|
|000001f0| 6e 74 62 72 69 61 6e 64 | 0d 09 09 50 2e 4f 2e 20 |ntbriand|...P.O. |
|00000200| 42 6f 78 2e 20 31 31 33 | 33 0d 09 09 53 61 73 6b |Box. 113|3...Sask|
|00000210| 61 74 6f 6f 6e 20 53 61 | 73 6b 61 74 63 68 65 77 |atoon Sa|skatchew|
|00000220| 61 6e 20 43 61 6e 61 64 | 61 0d 09 09 53 37 4b 20 |an Canad|a...S7K |
|00000230| 33 4e 32 0d 09 6f 72 20 | 62 79 20 65 6d 61 69 6c |3N2..or |by email|
|00000240| 20 61 74 3a 0d 09 09 74 | 69 6e 79 6a 6f 68 6e 40 | at:...t|inyjohn@|
|00000250| 73 6b 2e 73 79 6d 70 61 | 74 69 63 6f 2e 63 61 0d |sk.sympa|tico.ca.|
|00000260| 09 49 66 20 79 6f 75 20 | 77 6f 75 6c 64 20 6c 69 |.If you |would li|
|00000270| 6b 65 20 74 6f 20 68 61 | 76 65 3a 0d 09 09 74 65 |ke to ha|ve:...te|
|00000280| 63 68 6e 69 63 61 6c 20 | 73 75 70 70 6f 72 74 20 |chnical |support |
|00000290| 72 65 67 61 72 64 69 6e | 67 20 74 68 69 73 20 66 |regardin|g this f|
|000002a0| 69 6c 65 2c 20 73 65 6e | 64 20 61 20 70 6f 73 74 |ile, sen|d a post|
|000002b0| 63 61 72 64 2e 0d 09 73 | 65 65 20 61 6c 73 6f 3a |card...s|ee also:|
|000002c0| 0d 09 09 68 74 74 70 3a | 2f 2f 77 77 77 33 2e 73 |...http:|//www3.s|
|000002d0| 6b 2e 73 79 6d 70 61 74 | 69 63 6f 2e 63 61 2f 74 |k.sympat|ico.ca/t|
|000002e0| 69 6e 79 6a 6f 68 6e 0d | 2a 2f 0d 0d 23 69 66 6e |inyjohn.|*/..#ifn|
|000002f0| 64 65 66 20 5f 5f 53 45 | 56 45 4e 5f 5f 0d 23 64 |def __SE|VEN__.#d|
|00000300| 65 66 69 6e 65 20 5f 5f | 53 45 56 45 4e 5f 5f 0d |efine __|SEVEN__.|
|00000310| 0d 23 69 66 64 65 66 20 | 5f 5f 63 70 6c 75 73 70 |.#ifdef |__cplusp|
|00000320| 6c 75 73 0d 65 78 74 65 | 72 6e 20 22 43 22 20 7b |lus.exte|rn "C" {|
|00000330| 0d 23 65 6e 64 69 66 0d | 0d 23 69 6e 63 6c 75 64 |.#endif.|.#includ|
|00000340| 65 20 3c 54 79 70 65 73 | 2e 68 3e 0d 0d 2f 2a 20 |e <Types|.h>../* |
|00000350| 65 69 67 68 74 74 6f 73 | 65 76 65 6e 20 61 6e 64 |eighttos|even and|
|00000360| 20 73 65 76 65 6e 74 6f | 65 69 67 68 74 20 61 72 | sevento|eight ar|
|00000370| 65 20 75 73 65 64 20 66 | 6f 72 20 63 6f 6e 76 65 |e used f|or conve|
|00000380| 72 74 69 6e 67 20 62 75 | 66 66 65 72 73 0d 09 66 |rting bu|ffers..f|
|00000390| 69 6c 6c 65 64 20 77 69 | 74 68 20 38 20 62 69 74 |illed wi|th 8 bit|
|000003a0| 20 62 79 74 65 73 2c 20 | 74 6f 20 62 75 66 66 65 | bytes, |to buffe|
|000003b0| 72 73 20 66 69 6c 6c 65 | 64 20 77 69 74 68 20 37 |rs fille|d with 7|
|000003c0| 20 62 69 74 20 62 79 74 | 65 73 2e 0d 09 65 69 67 | bit byt|es...eig|
|000003d0| 68 74 74 6f 73 65 76 65 | 6e 20 74 61 6b 65 73 20 |httoseve|n takes |
|000003e0| 74 68 65 20 68 69 67 68 | 20 62 69 74 20 65 76 65 |the high| bit eve|
|000003f0| 72 79 20 37 20 62 79 74 | 65 73 2c 20 73 68 69 66 |ry 7 byt|es, shif|
|00000400| 74 73 20 69 74 20 69 6e | 74 6f 0d 09 61 20 77 6f |ts it in|to..a wo|
|00000410| 72 64 20 28 66 72 6f 6d | 20 74 68 65 20 6c 65 66 |rd (from| the lef|
|00000420| 74 29 20 61 6e 64 20 61 | 70 70 65 6e 64 73 20 69 |t) and a|ppends i|
|00000430| 74 20 74 6f 20 74 68 65 | 20 67 72 6f 75 70 2e 20 |t to the| group. |
|00000440| 73 65 76 65 6e 74 6f 65 | 69 67 68 74 0d 09 75 6e |seventoe|ight..un|
|00000450| 64 6f 65 73 20 77 68 61 | 74 20 65 69 67 68 74 74 |does wha|t eightt|
|00000460| 6f 73 65 76 65 6e 20 64 | 6f 65 73 2e 20 20 62 6f |oseven d|oes.  bo|
|00000470| 74 68 20 66 75 6e 63 74 | 69 6f 6e 73 20 63 6f 70 |th funct|ions cop|
|00000480| 79 20 66 72 6f 6d 20 73 | 72 63 0d 09 74 6f 20 64 |y from s|rc..to d|
|00000490| 73 74 20 61 6e 64 20 72 | 65 74 75 72 6e 20 74 68 |st and r|eturn th|
|000004a0| 65 20 6e 75 6d 62 65 72 | 20 6f 66 20 62 79 74 65 |e number| of byte|
|000004b0| 73 20 63 6f 70 69 65 64 | 20 74 6f 20 64 73 74 2e |s copied| to dst.|
|000004c0| 20 2a 2f 0d 6c 6f 6e 67 | 20 65 69 67 68 74 74 6f | */.long| eightto|
|000004d0| 73 65 76 65 6e 28 76 6f | 69 64 2a 20 73 72 63 2c |seven(vo|id* src,|
|000004e0| 20 76 6f 69 64 2a 20 64 | 73 74 2c 20 6c 6f 6e 67 | void* d|st, long|
|000004f0| 20 62 79 74 65 73 29 3b | 0d 6c 6f 6e 67 20 73 65 | bytes);|.long se|
|00000500| 76 65 6e 74 6f 65 69 67 | 68 74 28 76 6f 69 64 2a |ventoeig|ht(void*|
|00000510| 20 73 72 63 2c 20 76 6f | 69 64 2a 20 64 73 74 2c | src, vo|id* dst,|
|00000520| 20 6c 6f 6e 67 20 62 79 | 74 65 73 29 3b 0d 0d 23 | long by|tes);..#|
|00000530| 69 66 64 65 66 20 5f 5f | 63 70 6c 75 73 70 6c 75 |ifdef __|cplusplu|
|00000540| 73 0d 7d 0d 23 65 6e 64 | 69 66 0d 0d 23 65 6e 64 |s.}.#end|if..#end|
|00000550| 69 66 0d 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |if......|........|
|00000560| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000570| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000580| 00 00 01 00 00 00 01 6e | 00 00 00 6e 00 00 00 3e |.......n|...n...>|
|00000590| 65 6e 74 68 29 20 3d 3d | 20 30 29 20 70 72 6f 67 |enth) ==| 0) prog|
|000005a0| 28 28 61 63 74 75 61 6c | 2d 69 29 2b 31 2c 20 6c |((actual|-i)+1, l|
|000005b0| 07 53 45 56 45 4e 2e 68 | 02 00 00 00 54 45 58 54 |.SEVEN.h|....TEXT|
|000005c0| 4d 50 53 20 01 00 ff ff | ff ff 00 00 00 00 39 f7 |MPS ....|......9.|
|000005d0| 00 00 54 45 58 54 4d 50 | 53 20 01 00 ff ff ff ff |..TEXTMP|S ......|
|000005e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000005f0| 00 00 ac aa a4 5f 00 00 | 04 d3 00 00 01 ac 6e 75 |....._..|......nu|
|00000600| 65 3b 0d 09 09 09 7d 20 | 65 6c 73 65 20 69 66 20 |e;....} |else if |
|00000610| 28 66 69 6e 64 68 61 73 | 68 65 6e 74 72 79 28 28 |(findhas|hentry((|
|00000620| 75 6e 73 69 67 6e 65 64 | 20 63 68 61 72 29 20 4b |unsigned| char) K|
|00000630| 2c 20 63 75 72 72 65 6e | 74 2c 20 26 63 75 72 72 |, curren|t, &curr|
|00000640| 65 6e 74 29 29 0d 09 09 | 09 09 63 6f 6e 74 69 6e |ent))...|..contin|
|00000650| 75 65 3b 0d 09 09 09 6e | 65 77 68 61 73 68 65 6e |ue;....n|ewhashen|
|00000660| 74 72 79 28 6e 76 63 2c | 20 6e 76 73 74 65 2d 3e |try(nvc,| nvste->|
|00000670| 63 68 20 3d 20 28 75 6e | 73 69 67 6e 65 64 20 63 |ch = (un|signed c|
|00000680| 00 00 00 48 00 09 43 6f | 75 72 69 65 72 00 20 69 |...H..Co|urier. i|
|00000690| 03 df 70 f0 69 72 73 74 | 2c 20 69 6e 74 20 6c 61 |..p.irst|, int la|
|000006a0| 73 74 2c 20 69 6e 00 05 | 00 04 00 77 00 2f 01 9c |st, in..|...w./..|
|000006b0| 01 8d 00 77 00 2f 01 9c | 01 8d b0 5f 55 ed 00 00 |...w./..|..._U...|
|000006c0| 00 4f 00 00 02 68 00 00 | 00 00 01 00 00 00 00 1e |.O...h..|........|
|000006d0| 00 77 00 2f 01 9c 01 8d | 00 77 00 2f 01 9c 01 8d |.w./....|.w./....|
|000006e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000006f0| 01 00 00 00 01 6e 00 00 | 00 6e 00 00 00 3e 03 d6 |.....n..|.n...>..|
|00000700| 71 38 26 32 00 00 00 1c | 00 3e 00 00 4d 50 53 52 |q8&2....|.>..MPSR|
|00000710| 00 01 00 0a 03 ed ff ff | 00 00 00 00 00 00 00 00 |........|........|
|00000720| 03 f0 ff ff 00 00 00 4c | 03 d7 cc 64 00 00 00 00 |.......L|...d....|
|00000730| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000740| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000750| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000760| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000770| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+